home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
SPACE 1
/
SPACE - Library 1 - Volume 1.iso
/
program
/
355
/
source
/
oops_js
/
oopsmsg1.def
< prev
next >
Wrap
Text File
|
1990-02-02
|
269b
|
12 lines
DEFINITION MODULE oopsmsg1; (* Ken Badertscher (KBAD) 2/23/87 *)
CONST TotErrMsgs = 172;
ChPerErr = 78;
TYPE ErrMsgs = ARRAY [0..TotErrMsgs] OF
ARRAY [0..ChPerErr] OF CHAR;
PROCEDURE AssignErr1(VAR errs : ErrMsgs);
END oopsmsg1.